home *** CD-ROM | disk | FTP | other *** search
/ The Mac 13 / the-mac-13.iso / On The Rom / 100 Best Mac CD-ROMs Selection / The Treasure Hunt / thpb.Dxr / 00055.ls < prev    next >
Encoding:
Text File  |  1994-09-16  |  237 b   |  12 lines
  1. on mouseUp
  2.   global colours
  3.   set colours to intarray(mnew)
  4.   repeat with l = 21 to 27
  5.     set t to the foreColor of sprite l
  6.     puppetSprite(l, 0)
  7.     colours(mput, l - 20, t)
  8.   end repeat
  9.   puppetTransition(23)
  10.   go("skellyanim")
  11. end
  12.